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A  HIGHLY  PORTABLE  SYSTEM  FOR  ACQUIRING  AND  PROCESSING  AXBT’s 


I.  Introduction 


The  Acoustics  and  Environmental  Sciences  Divisions  of  the  Naval  Research 
Laboratory  are  engaged  in  field  studies  for  the  Navy  in  many  areas  of  the 
world.  During  these  studies  AXBT  (Aircraft  Expendable  Bathythermographs)  are 
utilized  to  obtain  the  temperature  of  the  ocean  from  the  surface  to  a  depth 
of  approximately  300  meters.  The  temperature  information  is  used  in  acoustic 
propagation  models  and  in  studies  to  characterize  the  microstructure  of  the 
ocean.  Also,  the  AXBT's  have  been  used  to  locate  and  delineate  ocean  eddy's 
through  which  acoustic  studies  have  been  performed. 

During  experiments  performed  aboard  an  aircraft  it  is  often  impractical 
or  inappropriate  to  install  oceanographic  computer  systems  due  to  the  size, 
weight  or  resources  required  to  install,  maintain  and  operate  the  computer 
system.  A  terminal  data  acquisition  and  processing  system  is  utilized  due 
to  its  small  size,  light  weight,  ease  of  operation  and  highly  portable  nature. 
Several  terminal  systems  have  been  developed  which  can  be  easily  used  aboard 
aircraft.  One  of  these  systems  is  used  for  acquiring  and  processing  inform¬ 
ation  from  AXBT's. 

The  AXBT  data  acquisition  and  processing  system  was  developed  using  a 
HP2645  Intelligent  Terminal  for  data  acquisition  and  recording.  The  AXBT 
data  that  is  stored  on  cassette  cartridges  by  the  HP2645  terminal  is  processed 
by  the  HP2647  Intelligence  Graphics  terminal  and  hard  copy  numerical  and 
graphical  output  is  obtained  by  using  an  HP2631G  graphics  printer  which  is 
interfaced  to  the  terminal.  Figure  1  is  a  photograph  of  the  AXBT  data 
acquisition  and  processing  system  installed  aboard  an  NRL  aircraft. 

II .  Design  of  Portable  Data  Acquisition  and  Processing  System 

A  functional  diagram  of  the  AXBT  Intelligent  Terminal  Data  Acquisition 
and  Processing  System  is  shown  in  Figure  2.  The  system  consists  of  an 
RO-308/SSQ-36  Bathythermograph  Data  Recorder,  CHRONO-LOG  Series  70000  Time 
Code  Generator,  NRL  designed  Switch  Panel,  an  HP2645  terminal,  an  HP2647 
terminal  and  an  HP2631G  Printer.  The  components  of  the  system  are  described 
in  detail  below. 

1 .  RO-308/SSQ-36  Bathythermograph  Data  Recorder 

The  Bathythermograph  Data  Recorder  is  used  to  record  ocean  temper¬ 
ature  information  by  converting  radio  signals  transmitted  by  a  temperature 
sensing  sinking  probe.  The  radio  frequency  signal  is  converted  to  a  digital 
output  in  the  form  of  an  eight  bit  binary  data  word.  The  digital  output  of 
the  Recorder  is  interfaced  to  the  terminal  AXBT  data  acquisition  system. 
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2.  AXBT  Data  Acquisition  and  Processing  System 

The  AXBT  data  acquisition  system  consists  of  two  RO-308/SSQ-36  Data 
Recorders.  The  recorders  are  capable  of  receiving  signals  at  several  differ¬ 
ent  frequencies.  This  is  necessary  if  there  are  several  AXBT's  deployed  from 
the  aircraft  in  the  same  area.  The  frequency  at  which  the  AXBT  will  transmit 
is  preset  and  the  AXBT's  are  dropped  in  an  order  that  alternates  the  frequency. 
The  output  of  the  AXBT  recorder  is  in  analog  form  and  produced  on  a  strip 
chart  recorder  and  ir  a  binary  8  bit  format  on  a  rear  connector.  The  output 
is  in  degrees  Fahrenheit  with  a  resolution  of  one-half  degree  represented  by 
the  least  significant  bit. 

The  data  acquisition  system  utilizes  an  HP2645  intelligent  terminal 
and  is  shown  in  Figure  3.  The  terminal  contains  a  programmable  microprocessor, 
128K  bytes  of  ROM  (Read  Only  Memory)  and  RAM  (Random  Access  Memory) ,  keyboard, 
display,  cartridge  tape  units  and  control  electronics.  The  terminal  has  all 
of  the  salient  features  of  a  microcomputer  and  can  be  used  as  such  or  as  a 
computer  terminal.  The  major  features  of  the  terminal  are  described  below. 

a.  HP2645  Intelligent  Terminal 

The  interior  view  of  the  terminal  is  shown  in  Figure  4.  There 
are  fifteen  available  circuit  boards  that  can  be  inserted  into  the  backplane 
of  the  terminal .  Ten  of  these  electronic  circuit  boards  are  used  for  control 
of  the  terminal  leaving  five  interface  locations  available.  Two  of  the 
control  boards  are  high  density  HP13297A-003  32K  Byte  RAM  boards.  The  strapp¬ 
ing  configurations  for  these  boards  are  documented  in  Table  I.  For  the  AXBT 
data  acquisition  system  three  interfaces  are  required,  namely,  the  AXBT 
Recorder,  the  Time  Code  Generator  and  the  Switch  Panel. 

b.  I/O  Terminal  Interfaces 


The  HP13255  Terminal  Duplex  Register  Board  described  in 
Reference  1  was  selected  for  interfacing  with  the  AXBT  Recorder,  digital  clock 
and  switch  panel.  All  of  these  devices  provide  binary  outputs  at  TTL  logic 
levels.  The  Duplex  Register  Board  contains  8  data  receiving  lines  and  8  status 
lines.  It  was  recognized  that  the  eight  status  lines  could  be  used  for  data 
input  as  well  as  the  eight  data  lines  resulting  in  sixteen  data  lines  for 
input.  The  polarity  of  the  status  lines  on  the  interface  is  reversed  from 
the  data  lines  except  for  bits  zero  and  one.  By  using  the  status  lines  the 
input  capacity  could  be  increased  from  five  eight  bit  words  to  five  sixteen 
bit  words,  thereby  doubling  the  data  acquisition  capacity  of  the  terminal. 

The  problem  of  polarity  can  be  handled  with  software  by  masking  the  two  status 
bits  of  opposite  polarity  complementing  the  remainder  and  adding  the  two  bits 
to  the  remainder  to  reform  the  byte. 

c.  External  Storage 

The  HP2645  Terminal  has  two  cassette  drive  units  mounted  below 
the  display.  Each  cassette  is  capable  of  storing  IlOK  Bytes  of  information. 

The  information  stored  on  these  cassettes  are  source,  object,  assembler  and 
debugger  programs  and  the  data  acquired  from  the  AXBT  data  acquisition  system. 
The  cassettes  can  be  operated  using  functional  keys  from  the  keyboard  or  under 
program  control.  Both  ASCII  and  binary  types  can  be  read  and  written  by  the 
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terminal . 


3.  Time  Code  Generator 


The  Time  Code  Generator  provides  digital  BCD  (Binary  Coded  Decimal) 
outputs  of  day  of  year,  hour,  minutes  and  seconds.  The  depth  of  the  AXBT  is 
determined  by  its  fall  rate  in  the  ocean.  For  the  SSQ-36  AXBT  the  fall  rate 
is  five  feet  per  second.  Therefore,  only  seconds  need  be  recorded  for 
determining  AXBT  depth  in  the  ocean.  When  a  temperature  is  recorded,  seconds 
of  time  to  determine  the  depth  is  recorded  as  well. 

4.  Switch  Panel 


The  switch  panel  is  used  in  the  AXBT  data  acquisition  system  to 
record  the  AXBT  number  and  to  inhibit  data  recording  prior  to  the  AXBT  send¬ 
ing  useful  information.  Prior  to  recording  AXBT  information  extraneous 
interrupts  were  found  to  occur  resulting  in  erroneous  data  recording  and  the 
AXBT  transmitter  would  continue  to  operate  long  after  useful  AXBT  information 
was  being  transmitted. 

The  AXBT  number  is  set  into  the  least  significant  eight  bits  on  the 
switch  panel  in  BCD  format.  The  AXBT  number  is  recorded  using  the  data  bits 
or.  the  terminal  interfaces  at  the  same  time  as  a  temperature  reading  is  being 
taken.  Bit  fifteen  on  the  switch  panel  is  used  to  start  and  stop  the  data 
acquisition  process.  The  eight  most  significant  bits  of  the  switch  panel  are 
interfaced  to  the  status  lines  of  the  terminal  interface  board.  Bit  fifteen 
is  checked  by  the  software  to  determine  when  data  recording  is  required.  The 
AXBT  data  recorded  on  these  tapes  are  used  by  the  HP2647  data  processing 
terminal  as  input. 

5.  HP2647  Data  Processing  System 

The  HP2647  Intelligent  Graphics  Terminal  is  constructed  in  an  identi¬ 
cal  mcinner  to  the  HP2645.  The  terminal  has  additional  electronic  boards  to 
provide  graphics  capability  and  the  use  of  a  BASIC  interpreter.  Two  interface 
slots  are  available  in  the  termina) .  An  HP-IB  interface  was  used  in  the 
terminal  to  output  to  the  HP2631G  graphics  printer.  The  program  in  the 
terminal  receives  its  data  from  cassettes  and  processes  the  data  using  a 
program  written  in  BASIC. 

Ill .  Data  Acquisition  Software  Description 

Prograuns  for  the  HP2645  intelligent  terminal  can  be  developed  by  pre¬ 
paring  the  source  program  and  using  the  assembler  available  on  Che  terminal 
or  by  using  an  HPIOOO  mini-computer  system  to  prepare  the  program  and  provide 
a  cross  assembly  for  loading  into  the  terminal.  Since  the  debugging  of  the 
program  can  only  be  performed  on  the  terminal  the  program  for  the  terminal 
AXBT  data  acquisition  was  developed  on  the  terminal. 

The  terminal  uses  a  Intel  8080  compatible  microprocessor.  The  micro¬ 
processor  differences  are  in  the  way  I/O  is  managed.  Therefor®,  the  program 
with  the  exception  of  I/O  is  Intel  8080  compatible.  The  terminal  has  many 
software  subroutines  stored  in  ROM  that  can  be  used  by  the  program  by  address¬ 
ing  the  starting  location  of  the  subroutines.  These  subroutines,  since  they 
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are  stored  in  ROMs  can  not  be  altered.  The  routine  PUTIO  for  performing  I/O 
to  the  terminal  display  and  cartridge  tape  units  was  used.  This  routine  will 
write  ASCII  records  to  the  display  and  either  tape  drive  depending  upon  the 
device  specified.  The  terminal  AXBT  program  has  been  programmed  to  use  only 
the  right  tape  drive  to  store  data. 

The  terminal  has  a  10  millisecond  internal  clock.  The  clock  is  used  to 
schedule  the  AXBT  program  by  storing  the  number  of  10  millisecond  intervals 
required  in  a  location  called  TIMER  which  the  terminal  executive  system  decre¬ 
ments.  Upon  decrementing  the  location  to  zero  the  executive  system  software 
transfers  control  to  a  predetermined  location.  The  starting  address  of  the 
user  program  is  stored  at  this  location  which  in  turn  permits  the  scheduling 
of  subroutines.  The  AXBT  data  acquisition  program  was  scheduled  to  execute 
every  second.  This  required  the  storing  of  100  in  the  location  TIMER  which 
equates  to  one  second.  It  was  necessary  to  schedule  the  AXBT  progrcim  to 
operate  once  per  second  because  there  were  many  interrupts  occurring  during 
this  time  and  there  was  only  a  small  variation  of  the  temperature  data  over 
many  seconds. 

The  terminal  data  acquisition  program  is  entered  by  transferring  control 
from  the  terminal  executive  program  to  the  program  CHTIMO.  The  function  of 
CHTIMO  is  to  schedule  the  data  acquisition  program  to  run  at  one  second  in¬ 
tervals.  This  is  accomplished  by  checking  for  the  TIMER  location  to  go  to 
zero.  When  100  ten  millisecond  intervals  have  occurred  software  control 
transfers  to  the  main  progrcim  CONTRL,  otherwise  a  return  to  the  terminal 
executive  program  is  executed. 

The  program  CONTRL  is  used  to  call  two  subroutines,  namely,  INIT2,  and 
INPUT.  These  programs  are  discussed  below. 

1.  Subroutine  1NIT2 


The  program  INIT2  stores  100  in  the  location  TIMER  which  allows  the 
terminal  executive  system  to  decrement  the  location  TIMER  100  times,  which 
takes  one  second  before  going  to  zero.  The  program  INIT2  is  called  every 
time  the  program  CHTIMO  calls  the  program  CNTRL. 

2 .  Subroutine  INPUT 


The  function  of  subroutine  INPUT  is  to  obtain  the  data  from  the 
external  sensors  and  devices.  It  accomplishes  this  task  by  requesting  data 
from  the  devices  using  a  memory  mapped  I/O  scheme.  All  of  the  three  interface 
boards  in  the  terminal  have  a  unique  address  determined  by  the  strapping  con¬ 
figuration  on  the  boards  which  are  given  in  Table  2 .  Under  program  control 
a  request  is  made  of  the  sensor  to  send  data.  The  data  is  buffered  into  the 
terminal  interface  I/O  board.  By  addressing  the  terminal  interface  board  with 
its  unique  address  the  data  can  be  handled  by  the  microprocessor  under  pro¬ 
gram  control. 

Program  INPUT  first  addresses  the  status  bits  of  the  Switch  Panel  to 
determine  if  bit  15  is  set.  If  bit  15  is  set  the  data  acquisition  commences 
otherwise  a  return  to  the  terminal  executive  program  is  executed.  When  bit 
15  is  set  the  program  addresses  the  data  bits  of  the  Switch  Panel  which  con¬ 
tains  the  AXBT  number  in  BCD  format.  The  AXBT  number  is  then  converted  from 
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BCD  to  ASCII  and  stored  in  memory. 

Temperature  from  the  AXBT  Recorder  is  obtained  by  setting  the  IN  flip- 
flop  on  the  terminal  interface  and  waiting  for  the  flip-flop  to  be  reset  by 
an  interrupt  from  the  recorder.  Upon  receiving  an  interrupt  the  binary  data 
bits  from  the  interface  are  converted  from  binary  to  ASCII  and  stored  in 
memory.  During  this  process  the  least  significant  bit  representing  one-half 
degree  is  masked  off  from  the  binary  word  before  the  conversion.  If  the  bit 
exists  an  ASCII  five  is  included  in  the  temperature  word  otherwise  an  ASCII 
zero  is  included. 

After  obtaining  the  temperature  value,  seconds  of  time  in  BCD  format  is 
obtained  by  addressing  the  clock  terminal  interface.  Seconds  of  time  are 
also  stored  in  memory  to  determine  the  depth  of  the  AXBT  when  the  temperature 
was  recorded . 

The  AXBT  number,  temperature  and  seconds  of  time  form  one  ASCII  record. 
This  record  is  output  to  the  display  and  right  cartridge  tape  by  the  program 
OUTERM.  The  progreun  OUTERM  moves  the  ASCII  record  to  a  system  buffer  and 
calls  the  system  prograut  PUTIO.  This  program  records  the  data  on  the  display 
and  the  right  cartridge  tape. 

The  assembly  language  program  for  AXBT  data  acquisition  is  documented 
in  Appendix  I. 

IV.  Program  Development 

The  source  program  is  written  in  a  compatible  INTEL  8080  language  with 
the  only  exception  being  the  I/O  operations.  These  I/O  operations  are 
accomplished  using  programs  stored  in  a  terminal  ROM,  and  by  using  memory 
mapped  instructions  to  the  I/O  interfaces. 

1.  Preparing  the  Program 

For  assembling  and  loading,  the  source  and  binary  programs  must 
reside  on  cartridge  tape.  The  source  program  can  be  placed  on  the  tape  by 
entering  the  source  code  into  the  terminal  display  memory  through  the  terminal 
keybocu:d.  Once  in  the  display  memory  the  source  code  is  transferred  to  tape 
using  the  terminal  function  keys  which  provide  the  caoabilitv  to  transfer 
data  between  the  terminal  and  other  devices.  An  alternate  method  of  obtaining 
the  source  code  on  tape  is  bv  keying  the  program  into  a  file  using  the 
HPlOOO  mini-comouter  system.  The  file  can  then  be  edited  and  "dumped"  to 
cartridge  tape  in  ASCII  format. 

2 .  Assembling  the  Program 


The  HP13290B  Debugger/Assembler  is  a  commercially  available  product 
from  Hewlett-Packard,  and  it  resides  on  cartridge  tape.  By  placing  the  tape 
in  the  left  drive  of  the  terminal  it  is  loaded  using  the  function  keys  on 
the  terminal.  Once  having  loaded  the  assembler  the  source  program  which 
resides  on  tape  is  Placed  on  the  left  drive  and  blank  tape  to  receive  the 
assembled  code  in  the  right  drive.  After  having  successfully  completed  the 
assembly  the  right  tape  with  the  assembled  code  is  then  placed  in  the  left 
tape  drive  and  under  keyboard  command  is  loaded  into  the  terminal.  .At  this 


5 


point  the  program  is  ready  for  execution.  Operating  instructions  for  the 
AXBT  data  acquisition  system  are  given  in  Appendix  II.  An  alternate  manner  of 
assembling  the  progrcim  is  to  use  the  cross-compiler  available  on  the  HPIOOO 
mini-computer  system.  The  assembled  program  is  stored  on  tape  in  the  same 
format  as  the  assembly  on  the  terminal.  Refer  to  Reference  2  for  specific 
instruction  on  using  the  HP13290B  Debugger/Assembler. 

V.  Data  Processing  Software  Description 

The  HP2647  Intelligent  Graphics  Terminal  is  used  to  process  the  AXBT  data 
acquired  by  the  HP2645  terminal.  The  requirements  of  this  processing  are  to 
read  the  data  from  the  cassette  tapes,  convert  the  temperature  from  degrees 
Fahrenheit  to  degrees  Centigrade,  determine  the  depth  from  the  seconds  of 
time,  and  provide  a  hard  copy  listing  and  plot  of  temperature  versus  depth. 

The  HP2647  terminal  was  selected  as  the  data  processing  device  because  it 
supports  a  BASIC  interpreter.  Computations  and  plotting  are  made  relatively 
easy  as  compared  with  assembly  language  programs  written  for  the  HP2645  terminal. 

The  processing  program  is  written  in  BASIC  programming  language.  The  data 
is  read  from  the  right  cartridge  tape  and  stored  into  a  buffer  in  the  terminal. 
Often  there  are  a  few  data  points  recorded  at  the  start  of  an  AXBT  recordinc 
that  are  erroneous  which  are  caused  bv  snurious  interrupts  from  the  AXBT 
receiver.  The  oroqraim  provides  the  option  of  deletinc  these  points  until  the 
researcher  is  satisfied  that  the  surface  temperature  is  correct.  These  errone¬ 
ous  data  points  are  easv  to  detect  since  readinqs  are  not  reasonable  values  of 
temperature.  After  havinq  determined  the  correct  startinq  point  of  the  data 
the  AXBT  records  are  read,  converted  to  decrees  centiqrade,  checked  for  reason¬ 
ableness  and  stored  in  a  memory  buffer.  If  a  reading  is  not  reasonable,  that 
is,  if  the  previous  value  is  more  than  three  degrees  different  from  the  current 
value  then  the  previous  value  is  used  since  temperature  of  the  water  varies 
slowly.  The  data  processing  is  concluded  when  the  A.XBT  number  changes. 

The  A.XBT  record  in  processed  form  is  output  to  the  printer  following  each 
reading.  The  program  requests  the  operator  to  enter  a  "9"  if  ready  for  a  plot, 
otherwise  a  "0".  The  plot  is  produced  on  the  graphics  display  and  a  hardcopy 
of  the  plot  can  be  obtained  on  the  graphics  printer  by  the  operator. 

Appendix  III  contains  a  program  listing  of  the  AXBT  processing  system. 

VI.  Discussion 


The  major  benefits  of  using  the  terminal  AXBT  data  acquisition  and  pro¬ 
cessing  system  is  its  compactness,  lightweight  and  reliability.  If  final  pro¬ 
cessed  data  is  not  required  during  flight  only  the  data  acquisition  terminal. 
Time  Code  Generator  and  Switch  Panel  need  be  installed  in  the  aircraft.  The 
results  obtained  by  the  terminal  AXBT  system  are  identical  to  those  that  can 
be  obtained  by  a  mini-computer  system.  Other  terminal  data  acquisition 
systems  for  magnetic  field  surveys  and  acoustic  experiments  aboard  ship  and 
aircraft  have  been  developed  and  have  been  found  to  operate  in  the  same  reli¬ 
able  manner  as  the  AXBT  system.  The  magnetics  system  has  been  documented  in 
Reference  5. 
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TABLE  1 


SWITCH  POSITIONS  FOR  HP13297A-003  32K 
BYTE  RAM 


SWITCH  BOARD  1  BOARD  2 


INH 

OPEN 

OPEN 

32K 

OPEN 

CLOSED 

16K 

OPEN 

OPEN 

8K 

OPEN 

OPEN 

AK 

OPEN 

OPEN 

INH 

OPEN 

OPEN 

32K 

OPEN 

CLOSED 

16K 

CLOSED 

CLOSED 

8K 

OPEN 

OPEN 

AK 

OPEN 

OPEN 

R.M 

OPEN 

OPEN 

RAM 

OPEN 

OPEN 

R.M 

OPEN 

OPEN 

RAM 

OPEN 

OPEN 

Ml 

aOSED 

CLOSED 

.M2 

OPEN 

OPEN 

.M3 

OPEN 

OPEN 

FST 

OPEN 

OPEN 

RPT 

OPEN 

OPEN 

WPT 

OPEN 

OPEN 

7 


i'!il  Icrnilnal  data  accmisit ion  aiul  processintt 
'isialli'd  alioard  N'KN  aircraft 


I 

i 


Fig.  2  —  Functional  block  diagram  of  terminal  AXBT  system 


R  030 


Fig.  4  -  Intorior  view  of  111’  ‘iivlf)  intflligont  torniinal 
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APPENDIX  I 


ASSEMBLY  LANGUAGE  PROGRAM  FOR  AXBT  DATA  ACQUISITION  SYSTEM 

«»««««  T^OOOOO  IS  ON  LU  20 


0001 

iTAPE*! 

TAB 

VER  13  XBT 

DATA  TIME  SET  AT  ONE  SECOND 

0002 

ALTIO 

EQU 

20B 

.DEFINES  PROGRAM  AS  ALT  I/O  DRIVER 

0003 

TIMER 

EQU 

176147Q 

iTIME  OUT  COUNTER 

0004 

PUTIO 

EQU 

4199H 

iSUBROUTINE  TO  OUTPUT  DATA  IN  ASCII 

0005 

OUTDEV 

EQU 

0FF4DH 

.SPECIFIES  OUTPUT  DEVICE 

0006 

GTIOBO 

EQU 

3D1BH 

iSYSTEM  SUBROUTINE  TC  GET  AN  I/O  BUFFER 

0007 

GETPTR 

EQU 

3D46H 

jSYSTEM  BUFFER  ADDRESS 

0008 

XFRLIM 

EQU 

0FF47H 

jSPECIFIES  THE  NUMBER  OF  CHAR  TO  OUTPUT 

0009 

INMAGD 

EQU 

105001Q 

^ADDRESS  TO  INPUT  LS  SWITCH  PANEL  CHARS 

0010 

INMAGS 

EQU 

105000Q 

.ADDRESS  TO  INPUT  MS  SWITCH  PANEL  CHARS 

0011 

SMINFF 

EQU 

10S007Q 

iSETS  IN  FF  ON  SWITCH  PANEL  INTERFACE 

0012 

RMINFF 

EQU 

105005Q 

iRESETS  IN  FF  ON  SWITCH  PANEL  INTERFACE 

0013 

CMINFF 

EQU 

105003Q 

>ADDRESS  TO  READ  FLAG  ON  SWTCH  PANEL  INT 

0014 

INDV^MD 

EQU 

106001Q 

jADDRESS  TO  INPUT  AXBT  READING  MS  CHARS 

0015 

INDVMS 

EQU 

106000Q 

iADDRESS  TO  INPUT  AXBT  STATUS  WORD 

0016 

SDINFF 

EQU 

106007Q 

jSETS  AXBT  IN  FF 

0017 

RDINFF 

EQU 

10600SQ 

> RESETS  AXBT  IN  FF 

0018 

CDINFF 

EQU 

106003Q 

iADDRESS  TO  READ  FLAG  ON  AXBT  INTERFACE 

0019 

INCLKD 

EQU 

104001Q 

^ADDRESS  TO  INPUT  LS  CLOCK  CHARSISEC) 

0020 

INCLKS 

EQU 

104000Q 

.ADDRESS  TO  INPUT  MS  CLOCK  CHARS(MIN) 

0021 

SCINFF 

EQU 

1Q4007Q 

iSETS  CLOCK  IN  FF 

0022 

RCINFF 

EQU 

10400SQ 

i RESETS  CLOCK  IN  FF 

0023 

CCINFF 

EQU 

104003Q 

(ADDRESS  TO  READ  FLAG  ON  CLOCK  INT 

0024 

MASKl 

EQU 

i7Q 

(MASKS  FOUR  LSB.USED  IN  BCD  TO  ASCII  SUBR 

0025 

MASK2 

EQU 

177Q 

(MASKS  MINUTES  ON  CLOCK  DATA 

0026 

MASK  3 

EQU 

376Q 

(MASKS  AXBT  VALUE  WITHOUT  5  DEG 

0027 

MASK  4 

EQU 

IQ 

(MASKS  5  DEC  BIT  ON  AXBT  VALUE 

0028 

ZER03 

EQU 

374Q 

(MASKS  6  MSBITS  OF  STATUS  WORD. USED  FOR  REVSTA 

0029 

THREE 

EQU 

3Q 

(MASKS  2  USBITS  OF  STATUS  WORD. USED  FOR  REVSTA 

0030 

INSFF 

EQU 

BOH 

(MASK  TO  CHECK  RESET  STATUS  ON  AXBT  READING 

0031 

jENTRY 

VECTORS 

0032 

ORG 

6000H 

(ABSOLUTE  STARTING  ADDRESS  IN  HEX 

0  033 

DB 

SOH 

(ALTERNATE  I/O  CODE  PRESENT 

0034 

DB 

70H 

(CHECK  FOR  CORRECT  LOCATION 

0035 

JMP 

INITl 

(INITIALIZATION  FROM  RESET 

0036 

JMP 

INIT2 

(INITIALIZATION  FROM  PROGRAM 

0037 

JMP 

RETURN 

(INTERRUPT  LOCATION  NOT  USED  RETURN 

0038 

JMP 

MON  IT 

.MONITOR  ROUTINE  USED  TO  DECREMENT  INTERVAL  TIMER 

0039 

JMP 

INPUT 

.DATA  INPUT  ROUTINE 

0040 

JMP 

OUTERM 

(DATA  OUTPUT  ROUTINE 

0041 

JMP 

CONTHL 

(ROUTINE  TO  CONTROL  DATA  ACQUISITION 

0  042 

JMP 

RETURN 

(STATUS  LOCATION  NOT  USED  RETURN 

0043 

JMP 

CHTIMO 

(START  ADDRESS  OF  PROGRAM . CHECK  FOR  TIMEOUT 

0044 

RETURN 

EQU 

9 

0045 

RET 

(RETURN  TO  TERMINAL  EXEC  WAIT  LOOP 

0046 

> INPUT 

THE  DATA 

0047 

INPUT 

EQU 

9 

0048 

LXI 

D.DATAOl 

(LOAD  ADDRESS  OF  DATAOilNTO  REG  D 

0049 

CETM 

EQU 

9 

0050 

LDA 

SMINFF 

.SET  IN  FF  ON  SWITCH  PANEL 

0051 

LDA 

RMINFF 

(RESET  IN  FF  ON  SWITCH  PANEL. GETS  CURRENT  READING 

0052 

LDA 

INHAG3 

(INPUT  STATUS  BYTE  OF  SWITCH  PANEL  INTERFACE 

0053 

AN  I 

INSFF 

((TEST  FOR  BIT  8  SET. 

0054 

SUI 

INSFF 

(  WHICH  IS  BIT  15  ON  SWITCH  PANEL) 

0055 

JM 

RETURN 

(RETURN  IF  BIT  8  NOT  SET. AXBT  NOT  ON 

0056 

LDA 

INMAGD 

.READ  DATA  BITS  ON  SWITCH  PANEL, AXBT  NUMBER 

0057 

CMA 

(COMPLEMENT  DATA  BITS 

0058 

PUSH 

B 

(SAVE  CONTENTS  OF  REG  B  IN  STACK, GOOD  HOUSEKEEPING 

0059 

CALL 

BCD2AS 

(CONVERT  AXBT  NUMBER  TO  ASCII 

0060 

STAX 

0 

.SAVE  MSCHAR  OF  AXBT  NUMBER 

0061 

I  NX 

D 

.INCREMENT  THE  DATA  STORAGE  LOCATION 

0062 

MOV 

A,B 

(GET  LSCHAR  AXBT  NUMBER  CNVRTED  TO  ASCII 

14 


r 


0063 

STAX 

D 

iSAVE  IT 

0064 

I  NX 

D 

i INCREMENT  DATA  STORAGE  LOCATION 

006S 

POP 

B 

^RESTORE  REGISTER  B 

0066 

GETD 

EQU 

« 

i ROUTINE  TO  GET  THE  AXBT  DATA 

0067 

LDA 

SDINFF 

iSETS  IN  FF  ON  AXBT  INTERFACE 

0068 

WAITO 

EQU 

« 

iROUTINE  TO  WAIT  FOR  INTERRUPT 

0069 

LDA 

CDINFF 

{LOAD  REG  A  WITH  FLAG 

0070 

AN  I 

INSFF 

i (CHECK  IF  IN  FF 

0071 

SUI 

INSFF 

i  HAS  BEEN  RESET) 

0  072 

JP 

WAITD 

tIF  RESET  HAS  NOT  OCCURRED  WAIT 

0073 

LDA 

INDVMD 

i INTERRUPT  HAS  OCCURRED  GET  AXBT  DATA 

0074 

STA 

DATAX 

iSAVE  AXBT  BINARY  VALUE, WILL  USE  TO  OBTAIN  LSB 

007S 

ANI 

MASK  3 

> DELETE  LSB  FROM  AXBT  WORD  BEFORE  ASCII  CONVERSION 

0076 

RRC 

{ROTATE  AXBT  WORD  RIGHT  1  BIT 

0077 

PUSH 

D 

{SAVE  REG  D  IN  STACK, GOOD  HOUSEKEEPING 

0078 

PUSH 

B 

{SAVE  REG  B  IN  STACK, GOOD  HOUSEKEEPING 

0079 

CALL 

B2ASC 

{CALL  ROUTINE  TO  CONVERT  AXBT  BIN  WORD  TO  ASCII 

0080 

NOV 

A,B 

{MOVE  MS  AXBT  ASCII  CHAR  TO  REG  A 

0081 

STA 

ASCI 

{SAVE  IT  TEMPORARILY 

0082 

MOU 

A,C 

{MOVE  SECOND  AXBT  ASCII  CHAR  TO  REG  A 

0083 

STA 

ASC2 

{SAVE  IT  TEMPORARILY 

0084 

NOU 

A,D 

,MOVE  LS  AXBT  ASCII  CHAR  TO  REG  A 

008S 

STA 

ASC3 

{SAVE  IT  TEMPORARILY 

0086 

POP 

B 

, RESTORE  REG  B  FROM  STACK 

0087 

POP 

D 

{RESTORE  REG  D  FROM  STACK 

0088 

LDA 

ASCI 

{LOAD  MS  AXBT  ASCII  CHAR  TO  REG  A 

0089 

STAX 

D 

, STORE  CHAR  IN  DATA  LOCATION 

0090 

INX 

D 

{INCREMENT  DATA  LOCATION 

0091 

LDA 

ASC2 

{LOAD  A  WITH  SECOND  AXBT  ASCII  CHAR 

0092 

STAX 

D 

{STORE  CHAR  IN  DATA  LOCATION 

0  093 

INX 

D 

{INCREMENT  DATA  LOCATION 

0094 

LDA 

ASC3 

{LOAD  A  WITH  LS  AXBT  ASCII  CHAR 

0095 

STAX 

D 

{STORE  IT  IN  DATA  LOCATION 

0096 

INX 

D 

, INCREMENT  DATA  STORAGE  LOCATION 

0097 

LDA 

DATAX 

{BINARY  AXBT  VALUE 

0098 

ANI 

MASK4 

,MASK  OFF  LS  BIT  FOR  S  DEC  VALUE 

0099 

SUI 

MASK4 

{SUBTRACT  BIT  FOR  TEST  OF  5  DEG 

0100 

JM 

PUTA2 

{IF  S  DEG  BIT  NOT  THERE, JUMP  TO  PUT  A  ZERO 

0101 

MV  I 

A,35H 

,MOVE  ASCII  FIVE  TO  REG  A 

0102 

STAX 

D 

{STORE  IT  IN  DATA  LOCATION 

0103 

INX 

D 

{INCREMENT  DATA  LOCATION 

0104 

JMP 

GETCLK 

,JUMP  TO  GET  TIME 

0105 

PUTAZ 

EQU 

S 

, PLACE  AN  ASCII  ZERO  IN  DATA  LOC 

0106 

MVI 

A,30H 

{MOVE  ASCII  ZERO  TO  REG  A 

0107 

STAX 

D 

, STORE  ZERO  IN  DATA  LOCATION 

0108 

INX 

D 

, INCREMENT  DATA  LOCATION 

0109 

GETCLK 

EQU 

* 

{GET  SECONDS  OF  TIME  FROM  CLOCK 

0110 

LDA 

SCINFF 

{SEI  IN  FF  ON  CLOCK  INTERFACE 

0111 

LDA 

RCINFF 

, RESET  IN  FF  ON  CLOCK  INTERFACE 

0112 

LDA 

INCLKD 

{INPUT  THE  CLOCK  DATA 

0113 

CMA 

.COMPLEMENT  THE  CLOCK  DATA 

0114 

ANI 

MASK2 

.ELIMINATE  MINUTES  BIT  ON  CLOCK  DATA 

Oils 

PUSH 

B 

.SAVE  B  REG  IN  STACK, GOOD  HOUSEKEEPING 

0116 

CALL 

BCD2AS 

{CONVERT  CLOCK  SECONDS  FROM  BCD  TO  ASCII 

0117 

STAX 

D 

{SAVE  THE  MS  ASCII  SECONDS  CHARACTER 

0118 

STAX 

D 

,SAVE  THE  MS  ASCII  SECONDS  CHARACTER 

0119 

INX 

D 

{INCREMENT  DATA  LOCATION 

0120 

MOV 

A,B 

{MOVE  THE  LS  ASCII  CHAR  SEC  TO  REG  A 

0121 

STAX 

D 

.SAVE  THE  LS  ASCII  SEC  CHAR 

0122 

INX 

D 

.INCREMENT  THE  DATA  LOCATION 

0123 

POP 

B 

{RESTORE  REG  B.COOD  HOUSEKEEPING 

0124 

j ROUTINE  TO  OUTPUT  8 

DATA  CHARACTERS  TO  DISPLAY  AND  RT  CTU 

012S 

LXI 

H,DATA01 

{LOAD  IMMEDIATE  ADDRESS  TO  REG  H 

0126 

MVI 

A, 8 

{LOAD  REG  A  WITH  8(NUMBER  OF  CHARS) 

0127 

MVI 

D,6 

.LOAD  REG  D  WITH  6<DISPLAY  AND  CTU  CODE) 

0128 

CALL 

OUTERM 

{ROUTINE  TO  OUTPUT  THE  DATA 

0129 

RET 

i RETURN 

0130 

DATAX 

DB 

0 

i TEMPORARY  STORAGE  OF  AXBT  DATA 

0131 

ASCI 

DB 

0 

iTEMPORARY  STORAGE  OF  FIRST  AXBT  CHAR 

0132 

ASC2 

DB 

0 

i TEMPORARY  STORAGE  OF  SECOND  AXBT  CHAR 

0133 

ASC3 

DB 

0 

jTEMPORARY  STORAGE  OF  THIRD  AXBT  CHAR 

0134 

DATAOl 

DS 

8 

iRESERVE  a  WORDS  OF  DATA  STORAGE 

013S 

>TAPE*2 

TAB  UER  13  SINGLE  CHANNEL  DATA  WITH  INTERRUPT  4/24/79 

0136 

INITl 

EQU 

• 

i INITIALIZATION  ROUTINE 

0137 

INIT2 

EQU 

* 

i INITIALIZATION  ROUTINE 

0138 

MU  I 

A, 100 

iMOVE  100  TO  REG  AdOO  TEN  MILLSEC) 

0139 

STA 

TIMER 

iSTORE  100  IN  LOC  TIMER ( EQUIVALENT  TO  1  SEC 

0140 

RET 

i RETURN 

0141 

C0UNT4 

DB 

OH 

i TEMPORARY  STORAGE 

0142 

i MONITOR  ROUTINE  FOR  TIMING  DATA  INPUT 

0143 

MON  IT 

EQU 

« 

0144 

LXI 

H, TIMER 

iLOAD  IMMEDIATE  ADDRESS  OF  TIMER 

014S 

DCR 

M 

i DECREMENT  THE  TIMER  LOCATION 

0146 

RET 

i RETURN 

0147 

i ROUTINE  TO  CHECK  FOR 

TIMEOUT 

0148 

CHTIMO 

EQU 

« 

0149 

LDA 

TIMER 

iLQAD  REG  A  WITH  VALUE  OF  LOC  TIMER 

0150 

ORA 

A 

0151 

JP 

RETURN 

iJUMP  TO  RETURN  IF  NOT  TIMED  OUT 

0152 

JMP 

CONTRL 

iTlME  IS  NEGATIVE. ACQUIRE  DATA 

0153 

.CONTROL  ROUTINE  TO  GET  AND  PROCESS  DATA 

0154 

CONTRL 

EQU 

• 

0155 

CALL 

INIT2 

iRESET  TIMER 

0156 

CALL 

INPUT 

jROUTINE  TO  ACQUIRE  THE  DATA 

0157 

RET 

iRETURN 

0158 

iBCO  TO 

ASCII 

CONVERSION  ROUTINE 

0159 

i  INPUT 

REG  A«DATA 

0160 

i  OUTPUT  REG 

A«MSBYTE, 

REG  B»LSBYTE 

0161 

BCD2AS 

EQU 

« 

0162 

STA 

CNBYTE 

i STORE  DATA  BYTE  IN  TEMPORARY  STORAGE 

0163 

RRC 

i (SHIFT  DATA  BYTE  FOUR  BITS  TO 

0164 

RRC 

>(GET  MS  BCD  CHARACTER 

0165 

RRC 

0166 

RRC 

0167 

AN  I 

MASKl 

(MASK  OFF  BCD  CHARACTER 

0168 

AC  I 

30H 

,ADD  30  HEX  TO  CONVERT  TO  ASCII 

0169 

STA 

ASMSB 

> STORE  MS  ASCII  CHARACTER 

0170 

LDA 

CNBYTE 

,LOAD  REG  A  WITH  DATA  BYTE 

0171 

AN  I 

MASKl 

jMASK  OFF  LS  BCD  CHARACTER 

0172 

AC  I 

30H 

,ADD  30  HEX  TO  CONVERT  TO  ASCII 

0173 

MOV 

B,A 

jMOVE  LS  CHAR  TO  REG  B 

0174 

LDA 

ASMSB 

>LOAD  MS  ASCII  CHAR  TO  REG  A 

S175 

RET 

iRETURN 

0176 

ASMSB 

DB 

0 

, TEMPORARY  STORAGE  MS  CHAR 

0177 

CNBYTE 

DB 

0 

i TEMPORARY  STORAGE  DATA  BYTE 

0178 

.OUTERM 

OUTPUTS  A  RECORD  TO  THE  TERMINAL 

0179 

> 

0180 

, INPUT 

REGISTER  H6L 

ADDRESS  OF  FIRST  BYTE 

0181 

> 

A 

NO  OF  CHAR  TO  OUTPUT 

0182 

> 

0 

OUTPUT  DEVICE 

0183 

) 

0*LEFT  CTU 

0184 

> 

2*RIGHT  CTU 

0185 

) 

4«DISPLAY 

0186 

BUFER 

DS 

2 

i RESERVE  2  LOCATIONS  TO  SAVE  BUFFER  ADDRESS 

0187 

^OCHAR 

DS 

1 

.RESERVE  1  LOCATION  FOR  NUMBER  OF  CHARS 

0188 

tJUTERM 

EQU 

« 

.OUTPUT  ROUTINE 

0189 

STA 

NOCHAR 

.SAVE  THE  NUMBER  OF  CHARS  FROM  REG  A 

0190 

MOV 

A.D 

.LOAD  REG  AWITH  OUTPUT  DEVICE'S  CODE 

0191 

STA 

OUTDEV 

iSAVE  OUTPUT  DEVICES  CODE 

0192 

SHLD 

BUFER 

iSAVE  BUFFER  ADDRESS 

0193 

CALL 

GTIOBO 

iGET  A  SYSTEM  BUFFER 

0194 

MU  I 

M,200Q 

.CLAIM  BUFFER  WITH  BIT 

0195 

PUSH 

H 

iSAVE  STATUS  POINTER 

0196 

DCX 

H 

> DECREMENT  POINTER 

0197 

MWI 

M,377Q 

iSET  UP  RECORD  TRANSFER (-1) 

0198 

DCX 

H 

i DECREMENT  H4L 

0199 

LDA 

NOCHAR 

iLOAD  REG  A  WITH  RECORD  LENGTH 

0200 

0201 

MOV 

XCHG 

M,A 

jSAVE  RECORD  LENGTH 
iSUAP  H6L  AND  D6r 

0202 

CALL 

GETPTR 

>CET  BUFFER  ADDRESS 

0203 

CALL 

MOVDAT 

iMOVE  DATA  INTO  BUFFER  OBTAINED  BY  GTIOBO 

0204 

POP 

D 

jRESTORE  STATUS  POINTER 

0205 

0206 

CALL 

XCHG 

PUTIQ 

i OUTPUT  THE  RECORD 

iSUAP  H&L  AND  D4E  REGISTERS 

0207 

0208 

HVl 

RET 

M,0 

i  RELEASE  BUFFER 
i  RETURN 

0209 

MOVDAT 

EQU 

» 

iROUTINE  TO  MOVE  DATA  TO  SYSTEM  BUFFER 

0210 

PUSH 

D 

iSAVE  D6E  IN  STACK, GOOD  HOUSEKEEPING 

0211 

LDA 

NOCHAR 

i NUMBER  OF  CHARACTERS  TO  REG  A 

0212 

MOV 

D.A 

iSAVE  NUMBER  OF  CHARS  IN  REG  D 

0213 

PUSH 

H 

>SAVE  H6L  REG  IN  STACK, GOOD  HOUSEKEEPING 

0214 

LHLD 

BUFER 

iLOAD  H6L  FROM  STORAGE  ADDRESS 

0215 

PUSH 

H 

i(SUAP  H6L  AND  B6C  REGISTERS 

0216 

POP 

B 

0217 

POP 

H 

iLOAD  H6L  WITH  BUFFER  ADDRESS 

0218 

SAVMOR 

EQU 

« 

0219 

LDAX 

B 

iLOAD  A  WITH  ASCII  CHAR 

0220 

MOV 

H,A 

iMOVE  ASCII  CHAR  TO  MEMORY 

0221 

INX 

H 

i INCREMENT  ASCII  SYSTEM  BUFFER 

0222 

INX 

B 

i INCREMENT  ASCII  PROGRAM  BUFFER 

0223 

OCR 

D 

i DECREMENT  NUMBER  OF  CHARACTERS 

0224 

JNZ 

SAVMOR 

iJUMP  UNTIL  8  CHARS  TRANSFERRED 

0225 

0226 

POP 

RET 

D 

i RESTORE  REGISTER  D«iE 
i  RETURN 

0227  jSUBROUTINE  TO  CONVERT  BIN  TO  ASCII 

0228  jALCORITHH  OBTAINED  FROM  "PRACTICAL  MICROCOMPUTER  PROGRAMMING ", W  J  WELLER 
022V  i INPUT  REG  A 
0230  iOUTPUT  REG  B,C,D 


0231 

B2A8C 

EQU 

* 

0232 

CNV8 

MV  I 

B,'0' 

iASCII  ZERO  TO  REG  B 

0233 

MOV 

C,B 

iASCII  ZERO  TO  REG  C 

0234 

CNV8A 

SUI 

100 

iSUBTRACT  100 

0235 

JC 

TENZ 

iSKIP  OUT  IF  CARRY 

0236 

I  NR 

B 

iINCREMENT  lOO'S  DIGIT 

0237 

JMP 

CNV8A 

,TRY  AGAIN 

0238 

TENZ 

ADI 

100 

i  RESTORE  NUMBER 

0239 

CNV8B 

SUI 

10 

iSUBTRACT  10 

0240 

JC 

UNITS 

iSKIP  OUT  IF  CARRY 

0241 

I  NR 

C 

i INCREMENTS  10  DIGIT 

0242 

JMP 

CNV8B 

,TRY  AGAIN 

0243 

UNITS 

ADI 

10 

,  RESTORE  NUMBER 

0244 

OR  I 

'0' 

iMERGE  ASCII  CODE  BITS 

0245 

MOV 

D,A 

iMOVE  A  TO  D 

0246 

RET 

, RETURN 

0247 

END 

APPENDIX  II 


OPERATING  INSTRUCTIONS  FOR  THE  TERMINAL  AXBT  DATA  ACQUISITION  SYSTEM 


1.  Turn  on  power  to  the  terminal,  Time  Code  Generator  and  Switch  Panel. 

2.  Insert  cartridge  tape  marked  Debugger/Assembler  in  left  tape  drive  of 

terminal. 

3.  Press  the  key  marked  READ  on  the  terminal.  Wait  for  completion. 

Explanation:  The  first  record  of  the  Debugger/Assembler  tape  will  be 
displayed. 

4.  Press  the  key  marked  f2  on  the  terminal.  Wait  for  completion. 

Explanation:  By  pressing  f2  the  second  record  on  the  Debugger/Assembler 
tape  will  be  loaded  into  the  terminal  memory.  The  message 
"OK  >"  will  be  displayed  on  the  terminal. 

5.  Remove  the  Debugger/Assembler  tape  from  left  drive  and  insert  the  tape 

marked  AXBT  Version  13  Binary. 

Explanation:  This  is  the  binary  AXBT  program  to  be  loaded  into  terminal 
memory. 

6.  Type  the  characters  "L"  and  "CR"  (Carriage  Return).  Wait  for  completion. 

Explanation:  This  sequence  will  load  the  binary  program  into  terminal 
memory.  The  message  "HP264X  ASSEMBLER  V2.0'’  will  appear 
on  the  terminal  display  followed  by  an  "OK^  "  prompt. 

7.  Place  a  blank  cartridge  in  the  right  terminal  drive. 

Explanation:  The  data  will  be  recorded  on  this  tape  cartridge.  The 
cartridge  should  be  unprotected  by  moving  the  protect 
lever  to  the  left  position.  The  tape  cartridge  should 
be  labeled  by  hand.  The  recommended  labeling  Is  day 
of  year  and  starting  hour  of  tape. 

8.  Type  "/9169"  then  "CR"  on  the  terminal  keyboard. 

Explanation:  An  instruction  in  location  9169n5)  must  be  modified  so 
that  control  will  be  transferrea  from  the  terminal 
executive  software  to  the  AXBT  program.  An  "87"  will 
appear  on  the  display. 
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9.  Type  "601A"  then  "CR"  on  the  terminal. 


Explanation:  The  starting  location  of  the  magnetics  program  is 
601A(i5).  a  "O"  will  appear  on  the  display. 

10.  Type  (colon)  on  the  terminal. 

Explanation:  The  will  terminate  the  modification  process.  An  "0K>" 
will  appear  on  the  terminal  display. 

11.  Enter  the  AXBT  number  on  the  Switch  Panel  in  BCD  format  in  bits  7  through 
4  and  bits  3  through  0. 

12.  Set  Bit  15  on  the  Switch  Panel  to  the  OFF  position. 

Explanation:  Bit  15  in  the  OFF  position  inhibits  data  recording  until 

useful  information  is  being  output  by  the  AXBT  recorder. 

13.  Press  the  RESET  button  on  the  terminal  only  once. 

Explanation:  Pressing  the  RESET  button  once  forces  a  transfer  in  the 

terminal  executive  to  the  AXBT  program.  The  program  will 
start  execution. 

14.  Wait  until  an  AXBT  is  deployed  from  the  aircraft  and  the  AXBT  recorder 
receives  a  valid  signal.  Turn  Bit  15  to  the  "ON"  position  on  the  Switch 
Panel. 

15.  Record  data  for  approximately  three  minutes  and  thirty  seconds.  At 
this  time  set  the  AXBT  number  on  the  switch  panel  to  zero  for 
approximately  five  seconds. 

Explanation:  Changing  the  AXBT  number  signals  the  end  of  an  AXBT 

recording. 

16.  Set  Bit  15  on  the  Switch  Panel  to  the  "OFF"  position  to  inhibit  data 
recording  until  the  next  AXBT  is  deployed. 

17.  Four  AXBT's  can  be  recorded  on  the  same  cassette  tape.  Replace  the 
Right  Cartridge  tape  if  four  AXBT's  have  been  recorded.  Go  back  to 
STEP  14. 
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APPENDIX  III 


LISTING  OF  AXBT  PROCESSING  PROGRAM 

10  SET  SHORT 

20  ASSIGN  "RIGHT  TAPE"  TO  *1 
30  ASSIGN  "SH*l"  TO  *6 

40  PRINT  ♦6i"AXBT", "TEMPERATURE", "DEPTH* 

SO  PRINT  *6 j "NUMBER", “(DEG  C> (METERS) " 

60  PRINT  ♦6j"  “ 

70  PLOTR 
80  GCLR 

90  PRINT  “ENTER  XBT  NUMBER" 

100  INPUT  Xbtno  lAXBT* 

110  DIM  Tenp<400) 

130  FOR  I»1  TO  400 
130  SET  LONG 

140  READ  «liAS  ! GET  DATA 

150  SET  SHORT 

160  Xbtn»UAL(A0[l,2])  !GET  XBT* 

170  IF  Xbtno-Xbtn=0  THEN  200  'CHECK  IF  XBT=*ENTERED 
180  IF  Xbtsw*l  THEN  390  (CHECK  FOR  END  OF  XBT  DATA 

190  GOTO  120  'NOT  YET, FIND  XBT  DATA 

200  Xbt»w=l  I  FOUND  THE  DATA, SET  SUTCH 

210  T»np3UAL(A«[3,61)/10  (CALC  TEMP 

220  TiH«*UAL<A*C7,8] )  ! GET  TIME 

230  L4«Ttin«>Tin* 

240  Te«p<I )=S/9*<Tenp-32) 

250  IF  Tenp*dir=77  THEN  320 
260  PRINT  “TEMPERATURE«“,Tenp(I) 

270  PRINT  “TYPE  7  AND  CH  IF  TEMPERATURE  OK, OTHERWISE  TYPE  0  AND  CR " 
280  Tenpld4T>T*np ( I ) 

290  INPUT  Tenpedit 

300  IF  Tenpedit^O  THEN  140 

310  T««p«diT»77 

320  IF  T»«p < I )-Tenplast >3  THEN  Te«p < I )=T«Mpla6T 
330  IF  T#np(  I)-T»f*pli9T< -3  THEN  T»«p  <  I  )»Tenplast 
340  PRINT  XbTn,Ti«e,T9np<I) ,(I-i)*S*.304a 
350  PRINT  ♦6>Xbtn,T«np<I),<I-l)*5*  3048 
360  Tcmp last^Tenp ( I ) 

370  N-I 
380  NEXT  I 

390  S(1)*0  'RESET  SUTCH^O 

400  PRINT  "WHEN  READY  FOR  GRAPH  ENTER  9  AND  CR " 

410  INPUT  U 

420  PLOTR  'PLOT  THE  DATA 

430  GCLR 

440  LOCATE  (20,180,20,90) 

450  SCALE  (0,400,5,25) 

460  LGRID  (-10,1,0,0,5,5,2) 

470  LORG  (5) 

480  CSIZE  (1,1,90) 

490  LDIR  (1.6) 

500  MOVE  (-40,15) 

510  PRINT  OO)  “TEMPERATURE  DEG  C* 

520  LDIR  (0) 

530  MOVE  (200,3) 

540  PRINT  *0, "DEPTH  IN  METERS" 

550  CSIZE  (6,1,0) 

560  MOVE  (20,2) 

570  PRINT  *0,  "AXBT*“,XbtnQ 
580  PENUP 

590  MOVE  (0,Tenp(i>) 

600  PENDN 

610  FOR  K»1  TO  N 

620  DRAW  ((K-l)«5«  3048 , Teno (K ) ) 

630  NEXT  K 
640  STOP 


